home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 18 / CU Amiga Magazine's Super CD-ROM 18 (1997)(EMAP Images)(GB)[!][issue 1998-01].iso / CUCD / Online / hsc / source / test / macro.expected < prev    next >
Encoding:
Text File  |  1997-09-26  |  1010 b   |  45 lines
  1. <HTML><HEAD><TITLE>kack</TITLE></HEAD><BODY>
  2.  
  3. ----simple resi----
  4. simple_resi.
  5. sepp(simple)=sepp_simple
  6. sepp(simple)=sepp_simple_2 (after <$let>)
  7.  
  8. ----old-style container----
  9.     resi_start: sepp=sepp_resi (inside resi)     resi_end  : sepp=sepp_resi
  10.  
  11.  
  12.  
  13.  
  14. ----paired resi----
  15. (start paired resi)
  16.   sepp(paired)=sepp_paired 
  17.   
  18.     resi_start: sepp=sepp_resi
  19.   sepp(paired)=sepp_global
  20.     resi_end  : sepp=sepp_resi
  21.   sepp(paired)=sepp_paired 
  22. (end paired resi)--
  23.  
  24. ----recursive resi----
  25.   recursive_start: sepp=sepp_recursive
  26.         recursive_start: sepp=sepp_recursive_x
  27.         recursive_start: sepp=sepp_recursive_x_x
  28.         recursive_start: sepp=sepp_recursive_x_x_x
  29.       ABORT recursion.
  30.     recursive_end  : sepp=sepp_recursive_x_x_x
  31.     recursive_end  : sepp=sepp_recursive_x_x
  32.     recursive_end  : sepp=sepp_recursive_x
  33.     recursive_end  : sepp=sepp_recursive
  34.  
  35. sepp(global)=sepp_global
  36.  
  37. ----nesting a container----
  38.  
  39. twice: (pag(lnk(hrf#hrf)lnk)pag)
  40. once : (lnk(hrf*hrf)lnk)
  41.  
  42.  
  43.  
  44. </BODY></HTML>
  45.